(calc-mode): Replace `copy-list' with `copy-sequence'.

diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el
index 00a33f59374928379ead862ff1bf65c95cc3cf26..78513c891f6fbc55654946871c35b91f5b88c729 100644 (file)
--- a/lisp/calc/calc.el
+++ b/lisp/calc/calc.el
@@ -1335,7 +1335,7 @@ Notations:  3.14e6     3.14 * 10^6
   (calc-refresh t)
   (calc-set-mode-line)
   (calc-check-defines)
-  (if calc-buffer-list (setq calc-stack (copy-list calc-stack)))
+  (if calc-buffer-list (setq calc-stack (copy-sequence calc-stack)))
   (add-to-list 'calc-buffer-list (current-buffer) t))
 
 (defvar calc-check-defines 'calc-check-defines)  ; suitable for run-hooks